home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / powerd / lib / chunky.lha / chunky / HLineFast.ass < prev    next >
Encoding:
Text File  |  1980-11-11  |  374 b   |  21 lines
  1.  
  2. ; HLineFast(chunky:a0:PTR TO chunky,x1:d0:LONG,x2:d1:LONG,y:d2:LONG,colour:d3:LONG)(LONG)
  3.  
  4.     machine    mc68020
  5.  
  6.     xdef    _HLineFast
  7.  
  8. _HLineFast
  9.     move.l    d2,-(a7)
  10.  
  11.     muls.l    (a0),d2
  12.     add.l    d0,d2        ; d2 contains position of first pixel
  13.     sub.l    d0,d1        ; d1 contains count of pixels
  14.     add.l    d2,a1        ; set first position
  15.  
  16. .loop    move.b    d3,(a1)+
  17.     dbra.s    d1,.loop
  18.  
  19. .finish    move.l    (a7)+,d2
  20.     rts
  21.